home *** CD-ROM | disk | FTP | other *** search
/ Virtual Sex Shoot / Virtual Sex Shoot.iso / mac / Virtual Sex Shoot / Virtual Sex Shoot.DXR / 00143.ls < prev    next >
Encoding:
Text File  |  1995-09-24  |  1.1 KB  |  31 lines
  1. global gMovieSprite, gMovieDuration, gWhichCamera, gAutomated, gStartTime, gStartTime1, gStartTime2, gStopTime, gStopTime1, gStopTime2, gAutoInUse
  2.  
  3. on mouseDown
  4.   set whichSprite to the clickOn
  5.   set whichCastName to the name of cast the castNum of sprite whichSprite
  6.   if (gAutoInUse = 1) or (whichCastName contains "off") then
  7.     exit
  8.   end if
  9.   if legalButton(whichSprite) then
  10.     if (gAutomated = 0) or developersKey() then
  11.       if gWhichCamera = "A" then
  12.         set oldMovieRate to the movieRate of sprite gMovieSprite
  13.         set the movieRate of sprite gMovieSprite to 0
  14.         updateStage()
  15.         set gWhichCamera to "B"
  16.         set gStartTime to gStartTime2
  17.         set gStopTime to gStopTime2
  18.         updateCamera()
  19.         set timeCodeOffset to gStartTime2 + (the movieTime of sprite gMovieSprite - gStartTime1)
  20.         storeStopTime(the movieTime of sprite gMovieSprite)
  21.         storeStartTime(timeCodeOffset)
  22.         set the movieTime of sprite gMovieSprite to timeCodeOffset
  23.         updateStage()
  24.         set the movieRate of sprite gMovieSprite to oldMovieRate
  25.         updateStage()
  26.       end if
  27.       go(the frame)
  28.     end if
  29.   end if
  30. end
  31.